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Chairman’? s 
Corner 


A hearty Thank You is in order 
for Dick Wagner, for standing in for 
me during the last meeting. This 
allowed me a much needed vacation! 

There is not much new to report 
this month. It seems a lot of other 
folks were on vacation as well. 

We have a repeat demonstration of 
Dwayne Hewitt’s RGB modification to 
a normal color TV scheduled for’ the 


next meeting. Hope to see you 
there! 

We also need some more topics 
and/or presentors, so bring your 


ideas with you. 
Elections will be upon us in a 


few weeks. Now is the time to think 
about which office you wish to hold 
or who you might wish to nominate. 


There was not much turnover in 
officers last year. I would like to 
see all of you express your ideas in 


this area. Or, better yet, nominate 
yourself! 

One last word, the Time Designs 
sponsored mini-fest is this month. 
Make plans to be there! 

Bye, 


Syd Wyncoop 


CLACKAMAS 
GOUNTY 
EA 
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Se CRE TS 
by Jack Arestrong 

Dick Wagner, in Syd Wyncoop’s ab-— 
sence, called the meeting to order 
at 7:45. The first subject that was 
discussed was the upcoming Seattle 
Mini-Fair to be held on Sept. 26th. 
During the discussion Rod asked for 
volunteers to man the CCAT/S table. 
It seems that in order to cover the 
9 a.m. to & p.m. hours, that all 
attending members should take part 
in this endeavor for 2 hour shifts. 
There was furthur discussion about 
the attendance of the Vancouver Club 
and the Seattle club as well as many 
individuals, Tim Woods pointed out. 
Next on the agenda was a discussion 
of the round-robin tapes and their 
current location. After that there 
followed a discussion of our finan-— 
cial status. Rod and Dick happily 
reported that we are in fine shape. 
It was announced that our next 
meeting will be on the 3rd Friday of 


September and Duane Hewitt will 
deliver a demo and talk on one of 
his own projects. Dick Wagner 


mentioned that he now had the Larken 
DOS and SPDOS (Ramex) running on his 
OQliger sustem. He can MERGE on SPDOS 
or the Larken and then switch in the 
Oliger. Dick wants more articles, 
reviews, comments for Plotter mater— 
jal. He and Rod verified that our TS 
Horizons sub will be filled by CTM 
magazine. The first issue is in the 
library. It is strong on Ham radio & 
Hacking generally. There is material 
on all Sinclair-timex based computer 
machines as well as others. Rod has 
a new Vince Lyon program: QL Sound 
Explorer. Rod handed out sheets of 
Timachine de—bugs and announced vast 
changes for his own catalog. He also 
has LKW?s MAKEDOS. There followed a 


lively discussion on DOS’s, RAM disc 
and the Larken sustem. Dick passed 
out sheets for alts to VU-CALC and 


gave a lengthy talk on the merits to 
dump to a big printer and formatting 
the columns for budget and account— 
ing uses. Duane Hewitt showed his TV 


converted cheaply to an RGB. Watch 
for upcoming article. Tim had his 
wife & son with him and at his sug- 


gestion it was voted toa produce 10@ 
extra copies of Plotter for the Fair 
in Seattle. Meeting over at 9:30. 


hy 


FROM THE 
ERPrITOR’S DpDESK 


After the summer doldrums you 
can get back into the computing 
mood by attending the GREAT NW 
MINI COMPUTER FEST. From the Last 
issue you learned that it will be 
on Sat. Sept. 26, 1987 in Seattle. 
More news is that you will have 
received flyers by this time. 


Also, “icing on cake* will be Bill 
Dunlop’s recent acqusition of a 
hus and he is providing 
transportation at a minimal cost. 
How can you refuse such a 
combination?? 

I recently ran across a 


simple 
hardware 


construction article 

that will adapt 
computer (with visual display) to 
a relay controlling system of 
électrical/mechanical devices. 
This appears to be a device worthy 
of testing on the inactive TS 
1900. Assuming all goes well, it 
Will be demonstrated at one of our 
meetings. 

The September meeting will be 
on the 3rd Friday, 18th in place 
of the second Friday. Sorry but 
that 4 wheel club signed up ahead 
of ME. Far West permits 
reservations only 2@ months ahead 
so early July was the time I had 
to make the reservation but 
someone was a few days ahead of 
Me. 
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QL programs have been few and 
far between. Space permitting, 
there will be a short program iin 
this issue. We really haven’t had 
any QL material since Vince Lyon 
ceased producing his QL column. 
Not being conversant with the QL 
system, it is my guess as to what 
would be interesting. 

I took the Liberty of sending 
our CCATS mailing list plus our 
exchange List to Gulf Micro 
Electronics Bill Jones. He is soon 
to he publishing a quality 
quatterly newsletter of interest 
to 2968 users. For those using the 
Oliger SAFE DOS there will he 
spsecific articles on this 
subject. See my article on this 
project. For $12.99 you can get a 
lot of information in a year so it 
is a good addition to your 


Continued on page 8 


BITS & BYTES 
by: ROD GOWEN 


Heard any TS related news lately? 
Did you get any information in the 
mail from other users, user groups, 
or vendors that may be of interest 
to our readers? If so, why not share 
it with us? We need all of the help 
that we can get. Please send any 
info that you might have to: Rod 
Gowen, C/O CCAT/S, 1419 1/2 7th 
Street, Oregon City, OR 97045, or, 
phone in at: 5@3/655-7484, 1@ AM- 1@ 
PM weekdays. I know that the entire 
user group will appreciate it! 


THE GREAT NW TS MINI-FAIR-is’ fast 
approaching!! ONLY 1 MONTH TO GO!! 
this was just a glimmer of an idea 
We are hoping for a great turn-out! 
We have heard of several people who 
will be attending from as far away 
as Michigan. We hope to see people 
from Montana, Washington, Oregon, 
Idaho, California and Canada. The 
location is not set for the SEATTLE 
MASONIC TEMPLE at 8@1 E. PINE STREET 
in Seattle. The date, again, is set 
for SEPTEMBER 26, 1987. Hours are 9 
AM to 6 PM on that Saturday. There 
are 7 Seminars booked and 2 more 
pending. Something for everyone. A 
lot of people are planning to come 
to Seattle on Friday and stay over 
until Sunday. It will make a nice 
Bini-vacation. Seattle has a lot to 
offer in the way of things to see 
and do. There will be a snack bar at 
the Fair and there are 5-6 places to 
eat within 5 blocks of the Temple. 
If you have hardware or software 
that you would like to swap or sell, 
be sure to bring it along, as there 
will be a swap table area open to 
all. If you are reading this and did 
NOT receive a flyer in the mail on 
the Fair, be sure to let us know and 
we will get one to you. The flyer 
has a couple of coupons on the back 
from the Fair sponsors, TIME DESIGNS 
MAGAZINE and RMG ENTERPRISES. The 
schedule of speakers is now as 
follows: 
9:15 AM 68000 ARCHITECTURE 

by: MICHAEL CARVER 
1@:1@ AM Z8@ MACHINE CODING 

by: SYD WYNCOOP 
11:05 AM QL ARCHIVE EXPLORED 

by: VINCE LYON-EXECUTIVE SW 
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12:00 N TELECOMMUNICATIONS 
by: JIM BALAZIC 
12:55 PM DISK DRIVES 
by: JOHN SEARCE 
1:50 PM ZX81/TS10@0- 
THE SKY’S THE LIMIT! 
by: WILF RIGTER 
2:45 PM 8@ COLUMN PRINTERS 
by: DICK WAGNER 
3:4@ PM CP/M OVERVIEW 
by:SYD WYNCOOP 
4:35 PM (OPEN SLOT AT THIS TIME) 


As noted earlier, these are to be 45 
minute talks and should prove inter- 
esting. We also have plans for vidoe 
taping these seminars and offering 
the tapes at a nominal charge. Ther 
will also be, as previously noted, 
quite a few door prizes ot be won. 
WE WILL SEE YOU THERE!! 


RMG ENTERPRISES-has just announced 
the release of a new QL program that 
will allow you to seriously experi- 
ment with the QL’s sound system. The 
title is EXECUTIVE SOUND EXPLORER 
and it sells for only $14.95 plus 
shipping. This is similar to the 
very succesfull program for the 2068 
called SOUNDESIGN. Using just a_ few 
keys, you can create thousands of 
different sounds! The new program 
was written by Vince Lyon of Execut- 
ive Workshop. For more info contact 
RMG ENTERPRISES, 1419 1/2 7TH STREET 
OREGON CITY, OR 97045 or phone: 5@3/ 
655-7484. 


ZEBRA SYSTEMS-has just put out a new 
catalog! If you are not on their 
Bailing list and would like to be, 
please send a note to them at: ZEBRA 
SYSTEMS, 78-@6 JAMAICA AVENUE, WOOD- 
HAVEN, NY 11421. 


WHJ DATA SYSTEMS-has aquired the 
rights to ZXPROFILE and PROFILE 2068 
from TOM WOODS. They will be selling 
both programs to the public as well 
as your local dealers. 


FD-68 USER NEWSLETTER-has disappear- 
ed! No one seems to know what has 
become of David Hill, the Editor of 
that publication. Your writer last 
spoke to David at the Indy Fest and 
was told at that time that there 
would be a NL out in a few weeks. 
Now, his phone and mail are unans- 
wered! 


A ato oO NEWSLETTER 


There will be a new kid on the block 
in October!! 


I have received information on 
a SAFE DISK UFP-DATE users news- 
letter to be published 4 times a 
year. SAFE DISK is the Oliger disk 
drive system. PLEASE don’t stop 
reading now because you don’t have 
this system, or even own a disk 
drive. 

This news Letter is only 
directed to this system as it will 
be the DOS considered. Many other 
interesting features will be: 
building block concepts: software 
and hardware articles and reviews; 
computing with disk drive systems: 
technical features such as schen- 
atics, data sheets and interfacing: 
programming with BASIC, assembly, 
SDOS; a catalog section to tell 
where to find it; an Editor’s 
columns electronic data such as 
commonly used formulas, symbols and 
tables: subscriber free ads for 
swap, sell, trade, and wanted 
items. 

Gulf Micro Electronics is well 
Launched into the venture with 
October set for the first issue. The 
issue was assembled in July so it 
should be on schedule. I have seen 
the cover sheet and the section 
Jividers all nicely done for 3 ring 
binders. 

John Oliger will have an 
information column, @ 2 A specific 
to his SAFE DOS, there will he 
articles and programs on many 
subjects from readers. The Editor, 

ill Jones, will be covering a wide 

nge of pro- gramming techniques in 

“SIC and assembly Languages 
(probably using TIMECHINE assenm- 
hbler). A great deal of this inform- 
ation comes from developing the 
Smart Text programs which to date is 
strong on advance BASICs. Another 
interesting point is using the disk 
system as a memory hank so the size 
of the computer memory is secondary 
to tremendous memory capacity. How 
about a full Length novel stored on 
disks (multi drives) and sent to the 
printer in proper order with desired 
headings, page numbers, etc? Bill 
can tell the reader how it is done. 


Another step in desk top 
printing is the programming to print 
a page in @ columns without backing 
up the paper (not all printers will 
hack space). I have seen such a page 
with page number, blocks Left for 
later inserts, and the preliminary 
program to do it. These subjects are 
described to give the reader an idea 
of Bill’s programming ability. 

The reader can subscribe to 
this 8 or more paged news Letter hy 
sending $12.98 to Gulf Micro 
Electronics, 1317 Stratford Ave., 
Fanama City, FL 32494. Subscription 
Will be by 4 issues and orders into 
a publishing year will date back to 
the October. 


a MU Tok? 
DICK WAGNER 


Aré you tempted to use UNLESS as a 
conditional? It would he nice and 
you can get the same result as: 
XXX IF NOT (condition)? THEN 
(statement) Like this: 


19@ LET C$="Y" UNLESS INKEY $="N® 
so usé this replacement form: 

1@¢ IF NOT ¢(INKEY $="N") THEN LET 
C$="y" 


How ahout the modifier UNTIL? 
Sinclair BASIC doesn’t support UNTIL 
as ins 


19 LET Z=Z-21 UNTIL Y¥¢=52 

try! 

1¢ LET Z=Z-21 

29 IF NOT (Y<{=52) THEN GOTO 184 


Do you need a FREE for your TS 
1090? 


A good report of the amount of 
memory remaining is given by: 


9998 PRINT PEEK 16386-16412+ 
CS6K(PEEK 16387-FEEK16413) 


How about the program Length in 
hytes for the TS 1960? 


19 PRINT PEEK 16396+256XPEEK 
16397-16509 


OQt- BANNER 


Tim Swenson 
Ed Note: 1987 
issue. 

This is a Little neatsy-keen 
program that I originaly wrote years 
ago, on the ZX81. 

The user types up to 1@ strings 
of up to 89 characters each. The 
strings are then slowly "marched* 
across the screen, very much like 
the signs on Bart (San Francisco). 
The Letters start on the right and 
scroll off to the left. 

The screen that is used to show 
the banner can be fancied up a bit. 
Playing around with the stipple of 
the stripes can be fun. 

So, here it is. Have fun with 
it. It might come in handy someday. 


160 WINDOW 512,256,0,¢ 2 FAPER @ 
: INK 4 


From Timelinez March, 


114 DIM a$(14,84) 

12@ clear_data 

13@ set_screen2d 

14% get_all 

15@ get_screenl 

16% REFeat loop 

179 FOR x = 1 TO 16 

186 IF LEN(a$(x)})<2 THEN NEXT x 
199 LET Length = LEN (a$(x)) 
20¢@ LET start_s=1 : LET last_s=1 
219 FOR y=1 TO LEN(Ca#(x))4+32 
229 PAUSE 10 

239 LET key=KEYROW(@) 

240 f_key 

250 IF key<{>@ THEN GO TO 16@ 
26 LET start_at = 32-y 

279 IF y>32 THEN start_at=@ 
284 LET x$=ag$(x)g* * 

290 AT 4,start_at : PRINT 


x$(start_s TO last_s) 


390 LET last_s=last_s +1 

319 IF y)31 THEN let start_s = 
start_s +1 

329 NEXT y 

330 AT 4,0: FRINT * * 

34@ NEXT x 

359 END REPeat Loop 


369 
378 


DEFine FROCedure f_key 
SELect ON key 


389 ON key=2 

399 set_screen2d 
409 get_string 

419 set_screenl 
4290 ON key=8 

436 clear_data 

449 set_screened 
45 get_all 

46 ON key=16 


Ul 


479 set_screene 
480 EXIT loop 
499 set_screenl 
549 STOF 

910 END SELect 

929 END DEFine f_key 


33@ DEFine FROcedure set_screeni 
34@ MODE 8 : WINDOW 512,256,060, 
359 PAPER @ : INK 4 : CLS 

96@ CSIZE 3,1 

97@ STRIP 1 : AT 2,@: FRINT *" * 
3986 STRIF 1 : AT 6,0: PRINT " * 
999 STRIP 4 : AT 1,4: PRINT " * 
6@@ STRIF 4 : AT 7,0: PRINT * * 
610 STRIP 3 : AT 6,@!: PRINT "© * 
62@ STRIP 3 : AT 8,@! PRINT * * 
630 STRIP @ 

64@ END DEFine set screeni 

65@ DEFine PROCedure set_screen2 
66@ MODE 4 © CSIZE 6,9 

67@ CLS 

68@ END DEFine set_screen2 

69@ DEFine PROCedure clear_data 
7¢@ FOR x = 1 TO 186 

719 ag¢x) = " 

720 NEXT x 

730 END DEFine clear_data 

74@ DEFine PROCedure get_string 
75 FRINT "Enter String Number 
to Re-enter * 

764 INPUT x 

770 FRINT &£ PRINT "Enter New 
String Message " 

789 INFUT x$ 

79 LET a#(x) = x$ 

8O¢@ FRINT © PRINT "Do You Want 
To Do Another? (Y/N)* 

81¢ INFUT x$ 

839 If x$="y" OR x$="Y" THEN GO 
TO 758 

839 CLS 


840 END DEFine get_string 
850 DEFine PROCedure get_all 


860 PRINT “How Many Message 
Strings Do You Want To Enter?" 
870 INFUT y 

880 PRINT 

89@ FOR x = 1T0 y 

99@ PRINT "Enter String Number 
#"sx 

919 INPUT x$ 

920 LET a#(x) = x$ 

939 PRINT 

940 NEXT x 


939 END DEFine get_all 


RPrancy Fronts 


Have you ever purchased a program 
that used a character set other than 
the one that came with your 268? 
Ever wished you could duplicate that 
character set in your programs? 
Here’s how you can do it! 


First, there is a system variable, 
called CHARS, that contains the 
location of the currently active 
character set. This is really the 
address of the character set, less 
256, to allow the computer to find 
the correct character information. 


The address of CHARS is 23686 and 
23687. CHARS is set to contain 15360 
upon turning on your computer. You 
can verify this by typing: 


PRINT PEEK 2536@6+PEEK 23607*256 


You will find that 236@6 contains @ 
and 236@7 contains 6@. This is how 
we tell the computer where to find 
the character set so, we can use the 
above statement to find the fancy 
character set we are interested in. 


Now, load in your program with the 
fancy characters. BREAK out of the 
program and type the above state- 


ment. Add 256 to answer you just got 
and write it down. This is the start 
of the fancy character set. 


The length of the character table is 
768. This is arrived at by knowing 
that there are 96 definable charac- 
ters, each needing 8 bytes of info- 
mation to define their shape. 


We now have all the information we 


need to ’lift’ the character set 
from the program, for our own use. 
Type in the proper command to save 
+he character information to what- 
ver storage medium you use. The 


ape command is: 
SAVE "name"CODE start, 768 


Remember to use the first number we 
calculated, in place of the word 


*start’, in the above command. 

The only thing we need to do now, in 
order to use our fancy characters is 
to load them and poke the system 
variable, CHARS. 


This is easiest to accomplish if we 
calculate a start address for our 
character table, such that it starts 
on a new page of memory. This allows 
us to change character sets with a 
Single POKE. 


The highest address we can use, 
without interfering with the UDG’s, 
is 64512. 64512/256=252. We need to 
remember to subtract 256 before our 
POKE. The easiest way to do this is 
to subtract 1 from 252. 


Now, type in the needed commands to 
load your fancy character set and 
POKE the system variable. The tape 
commands are: 


LOAD “name"CODE 64512 
POKE 23607,251 


Of course, you could load your char- 
acter set to almost any address. You 
need only adjust the address in the 
LOAD command and the value POKEd to 
CHARS, in the above commands. 


You can now switch between the char- 
acter sets at will. All that is 
needed is to POKE 23607,6@, for the 
normal characters or POKE 236987,251, 
for the fancy characters. 


If you are still using the 2040 
printer, this can be used to make 
the printing more legible. I use a 
*fat’ character set, for bold print- 
ing, to my 2040! 


Have Fun! 


mm Oo T I cC.-E 

Did you miss the September meeting 
date change on page 17 It is the 
3rd Friday the 18th. A special 
topic will be a CHEAP hut good RGB 
monitor from an old color TV hy 
member Duane Hewitt. We saw the 
monitor in action at the August 
meeting. 
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Richard Hurd 
POB 153 
Warrenton, OR 97146 


August 18th, 1987 


Rod Gowen 
1419 1/2 7th Street 
Oregon City, OR 97845 


Rod; 


I was off by 1 track when I wrote and told you about the 
discovery I had made in regards to LKDOS and the AMDISK III. I 
can get 42 tracks per side on the 3" diskette. 


I put together a short listing for a utility to convert 48 
track formatted diskettes to 42 tracks formatted. 


I don’t know how popular the AMDISK/LKDOS combination is 
but I’ve enclosed the listing. 


Sincerely, 


REM 42 TRACK CONVERTER FOR THE AMDISWK [II & LKDOS bu Richard Hurd 


POKE 23658,8: REM CAPS ON 

CLS : PRINT "1) CAT"’"2) CONVERT"? ? "CHOOSE ONE" 

IF INKEY$<>"" THEN GO TO 40 

IF INKEY$=""THEN GO TO 50 

LET A=CODE INKEY$: IF A“<49 OR A>5Q@ THEN GO TO 30 

CLS : PRINT #4: CAT "", 

IF A=49 THEN PRINT #13AT @,5;"Press SpacePar For Menu": PAUSE @: RUN 
LET save=4@@015: REM save buffer to disk 

LET load=40012: REM load disk into buffer 

LET Sprt=42009: REM Send Drive data to port 

LET setrk=40003: REM move head 

LET trac=43300: REM trac # -MC variable 

LET Drv=43301: REM Drive # MC variable 

REM LOAD TRACK 

POKE trac,@: POKE drv,2: RANDOMIZE USR setrk 

POKE drv,2: RANDOMIZE USR sprt: PAUSE 2@: RANDOMIZE USR load 

REM ALTER DIRECTORY DATA 

BEEP .1,10 

POKE 45021,42: POKE 45104,8@: POKE 45104,82 

REM SAVE TRACK 

POKE trac,@: POKE drv,2: RANDOMIZE USR setrk 

POKE drv,Z: RANDOMIZE USR sprt: PAUSE 4@: RANDOMIZE USR SAVE 

CLS s PRINT #4: CAT “", 

PRINT #13AT @,@3"ANOTHER? YES OR NO" 

IF INKEY$="""THEN GO TO 260 

IF INKEY$S="Y" THEN RUN 

STOP 

BORDER 7: PAPER 7: INK 9: CLS 

PRINT "40 TRACK TO 42 TRACK CONVERSION FOR THE AMDEK AMDISH III FDD" 
PRINT ’’’"This routine LOADS the Directorutrack into Ram, converts it to 4 


2 tracks, then SAVEs it back todisk." 


320 


PRINT ’’ "Work is done on Drive #@ ONLY!"’’"Make sure that the Write Protect 


Tab is OFF!" 


fA 


1) 


330 
340 
350 
360 
378 


PRINT ’’’’’TAB 33"Press SpaceBar To Convert" 

IF INKEY$="" THEN GO TO 340 

RUN 

PRINT #4: LOAD "“Fcode.CL"CODE : CLEAR 39999: GO TO 290 

PRINT #4: SAVE "40-42.BR1" LINE 36@: PRINT #4: SAVE “Fcode.CL"CODE 40080. 100 
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Continued from page 2 


computer Library. 

Lately I have been working 
with two different disk operating 
systems, both adapted to the 26468 
Oliger DOS interface. There will 
be reports on these 2 systems at 
later dates- after all it takes a 
period to learn their operation 
and use. The Larken system is also 
heing adapted for use with the 
Aerco disk IF. Question-will I he 
able to interchange disks made 
with an Larken Aerco DOS with the 
Larken Oliger DOS? 

Our library has anew 
newsletter from VISTA of the 
Vashon Island, Washington, user 
group. Address is FO Box 199, 
Vashon WA 980790. Editor is Tony 
Willing. Membership is 3 strong!. 
We are on a Newsletter exchange 
basis. 


MEMNBERSHIF LIstT 


Flease change BILL RICH as 
follows: 

9451 Liberty Road South 
Salem, OR 97306 9461 


SUBSCRIPTION RATES 


FREE SUBSCRIFTION WITH FAID 
CCAT/S MEMBERSHIF-$15.00/YR 
NON-MEMBER RATE - $ 8.5@/YR 


AD RATES 
KKK 
FOUR LINE CLASSIFIED FREE 
WITH MEMBERSHIP 
$ .50 7 LINE 
$ 5.00 / 1/4 PAGE 
$ 8.00 / 1/2 FAGE 


$¢ 15.00 / FULL PAGE 


ALL AD COPY MUST BE IN BY 
THE 10TH OF THE MONTH FRIOR 
TO THE MONTH AD IS TO RUN. 


VU 
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cCcaT/’s 
1419 1/72 7TH Street 
Oregon City, OR 97945 


ROD GOWEN 
1419 1/2 
OREGON cy 


AQOO3 12 (877% 


(TREASURER) 


